home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 1
/
Cream of the Crop 1.iso
/
PROGRAM
/
TJTOT10B.ARJ
/
SOURCE.EXE
/
arc
/
TOTREAL.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1991-02-11
|
981b
|
40 lines
{ Copyright 1991 TechnoJock Software, Inc. }
{ All Rights Reserved }
{ Restricted by License }
{ Build # 1.00 }
Unit totReal;
{$I TOTFLAGS.INC}
INTERFACE
{$IFNDEF FLOAT}
{$IFNDEF FLOATEM}
Type single = real;
double = real;
extended = real;
comp = real;
{$ENDIF}
{$ENDIF}
procedure RealInit;
IMPLEMENTATION
{|||||||||||||||||||||||||||||||||||||||||||||||}
{ }
{ U N I T I N I T I A L I Z A T I O N }
{ }
{|||||||||||||||||||||||||||||||||||||||||||||||}
procedure RealInit;
begin
end;
{end of unit - add intialization routines below}
{$IFNDEF OVERLAY}
begin
RealInit;
{$ENDIF}
end.
end.